home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 06r.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-02  |  1.9 KB  |  75 lines
  1. on startMovie
  2.   global gCursorReady, gKnobState, gMagCursor, gsearchOn, qtChan, gKnobSprite, gSendMovie, gCurrentLocation
  3.   puppetSprite(44, 1)
  4.   gCursorReady = 1
  5.   gMagCursor = "magCursor"
  6.   gCurrentLocation = 6
  7.   puppetSound(0)
  8.   gSendMovie = "06r"
  9.   qtChan = 35
  10.   sprite(qtChan).volume = 256
  11.   cast("fsmem").directToStage = 1
  12.   preLoad(qtChan - 1)
  13.   initGlobals()
  14.   gKnobSprite = 17
  15.   setUpKnob()
  16.   if gsearchOn = 1 then
  17.     sprite(6).visible = 1
  18.   else
  19.     sprite(6).visible = 0
  20.   end if
  21.   set the mouseDownScript to EMPTY
  22.   set the mouseUpScript to EMPTY
  23. end
  24.  
  25. on idle
  26.   global gCursorReady
  27.   if gCursorReady = 1 then
  28.     cursor(200)
  29.     checkCursors()
  30.     set the locH of sprite 44 to the mouseH
  31.     set the locV of sprite 44 to the mouseV
  32.     updateStage()
  33.   end if
  34. end
  35.  
  36. on checkCursors
  37.   global gMagCursor
  38.   set the castNum of sprite 44 to the number of member "curs1"
  39.   if rollOver(5) then
  40.     set the castNum of sprite 44 to the number of member "hotCursor"
  41.   end if
  42.   if rollOver(22) then
  43.     set the castNum of sprite 44 to the number of member "hotCursor"
  44.   end if
  45.   if rollOver(7) then
  46.     set the castNum of sprite 44 to the number of member "deMagCursor"
  47.   end if
  48.   repeat with i = 8 to 12
  49.     if rollOver(i) then
  50.       set the castNum of sprite 44 to the number of member "hotCursor"
  51.     end if
  52.   end repeat
  53.   repeat with i = 14 to 21
  54.     if rollOver(i) then
  55.       set the castNum of sprite 44 to the number of member "hotCursor"
  56.     end if
  57.   end repeat
  58.   repeat with i = 24 to 28
  59.     if rollOver(i) then
  60.       set the castNum of sprite 44 to the number of member "hotCursor"
  61.     end if
  62.   end repeat
  63.   if rollOver(36) then
  64.     set the castNum of sprite 44 to the number of member "hotCursor"
  65.   end if
  66.   if rollOver(37) then
  67.     set the castNum of sprite 44 to the number of member "nonCursor"
  68.   end if
  69.   repeat with i = 40 to 42
  70.     if rollOver(i) then
  71.       set the castNum of sprite 44 to the number of member "hotCursor"
  72.     end if
  73.   end repeat
  74. end
  75.